home *** CD-ROM | disk | FTP | other *** search
/ World of Video / World of Video.iso / gfxprograms / viewers / superviewel / install_superview.script < prev    next >
Text File  |  1995-02-13  |  2KB  |  89 lines
  1. ; $VER: Install_SuperView.script V3.2 (23.7.94)
  2. ; © 1993-94 by Andreas R. Kleinert.
  3. ; This is the Installer Script for SuperView
  4.  
  5. (set selectlang (askchoice
  6.                    (prompt "")
  7.                    (help @askchoice-help)
  8.                    (choices "Deutsche Installation" "English Installation")
  9.                    (default 1)
  10.                  )
  11. )
  12.  
  13. (if (= selectlang 0)
  14.  ; IF
  15.  (set @language "deutsch")
  16.  ; ELSE
  17.  (set @language "english")
  18. )
  19.  
  20. (if (= @language "deutsch")
  21.  
  22. ; IF so, set german texts
  23.   (
  24.     (set MSG_wrong_OS       (cat "Sie benötigen mindestens OS V2.04 für SuperView !\n\n"
  25.                                  "SuperView wird auf Ihrem System nicht laufen !"))
  26.     (set MSG_InstallingSuperView "Installiere jetzt SuperView. Die Libraries müssen separat installiert werden !")
  27.     (set MSG_SelectPath          "Wählen Sie das Zielverzeichnis für SuperView")
  28.     (set MSG_InstallingCatalogs  "Installiere jetzt die Katalog-Dateien für die\nOS V2.1+ Sprach-Unterstützung.")
  29.     (set MSG_SelectCatalogPath   "Wählen Sie den Pfad für die Katalog-Dateien")
  30.   )
  31. ; ELSE set english texts
  32.   (
  33.     (set MSG_wrong_OS       (cat "You need at least OS V2.04 to run SuperView !\n\n"
  34.                                  "SuperView will not run with your system configuration !"))
  35.     (set MSG_InstallingSuperView "Installing SuperView now. Libraries have to be installed separately !")
  36.     (set MSG_SelectPath          "Select path to install SuperView to")
  37.     (set MSG_InstallingCatalogs  "Installing Catalog-Files for OS V2.1+\nCode localization.")
  38.     (set MSG_SelectCatalogPath   "Select path to install Catalogs to")
  39.   )
  40. )
  41.  
  42. (set OS_VER (/ (getversion) 65536) )
  43.  
  44. (if(< OS_VER 37)
  45.   (abort MSG_wrong_OS)
  46. )
  47.  
  48. (complete 0)
  49.  
  50. (copyfiles
  51.   (prompt MSG_Installing)
  52.   (help @copyfiles-help)
  53.   (source "")
  54.   (set svcomdir
  55.               (askdir
  56.                      (prompt MSG_SelectPath)
  57.                      (help @askdir-help)
  58.                      (newpath)
  59.                      (default "SYS:SuperView")
  60.               )
  61.   )
  62.   (dest svcomdir)
  63.   (all)
  64.   (confirm)
  65. )
  66.  
  67. (complete 70)
  68.  
  69. (copyfiles
  70.   (prompt MSG_InstallingCatalogs)
  71.   (help @copyfiles-help)
  72.   (source "locale/catalogs")
  73.   (set svcomdir
  74.               (askdir
  75.                      (prompt MSG_SelectCatalogPath)
  76.                      (help @askdir-help)
  77.                      (newpath)
  78.                      (default "SYS:locale/Catalogs")
  79.               )
  80.   )
  81.   (dest svcomdir)
  82.   (all)
  83.   (confirm)
  84. )
  85.  
  86. (complete 100)
  87.  
  88.  
  89.